home *** CD-ROM | disk | FTP | other *** search
/ Aminet 19 / Aminet 19 (1997)(GTI - Schatztruhe)[!][Jun 1997].iso / Aminet / comm / www / ScanWWW.lha / ScanWWW / Install ScanWWW next >
Text File  |  1997-03-02  |  3KB  |  143 lines
  1. ; $VER:ScanWWW Install 2.0 (13.8.96)
  2.  
  3. (set @app-name "ScanWWW")
  4. (set @language "deutsch")
  5.  
  6. (makeassign "SCNInst" "" (safe))
  7.  
  8. (message "\n\nYou are about to install ScanWWW.\n"
  9.             "\nPlease read the Documentation before you start ScanWWW!\n"
  10.             "\nUse ScanWWWPrefs first!\n"
  11.             "\n©1996-1997 by Sebastian Rieger"
  12. )
  13.  
  14. (set newdest 
  15.     (askdir (prompt "Please enter the path where the ScanWWW drawer should be created.")
  16.         (help @askdir-help)
  17.         (default @default-dest)
  18.     )
  19. )
  20.  
  21. (set fulldest (tackon newdest "ScanWWW"))
  22. (set @default-dest fulldest)
  23. (makedir
  24.     (fulldest)
  25.     (prompt "Creating drawer...")
  26.     (help @makedir-help)
  27.     (infos)
  28. )
  29.  
  30. (copyfiles (prompt "Copying Icon...")
  31.         (help @copyfiles-help)
  32.         (source "Icons/ScanWWW.info")
  33.         (dest newdest)
  34. )
  35.  
  36. (copylib
  37.     (prompt "Copying/Updating CanDo.Library\nThis library is used by ScanWWWPrefs.")
  38.     (help
  39.         "The CanDo.library is patly used by ScanWWW. Please install it!\n"
  40.         "\nCanDo Legal Notice\n"
  41.         "\nThis program was designed and written with CanDo v3.0 ©1994.\n"
  42.         "Inovatronics, Inc.\n"
  43.         "8499 Greenville Ave. #209B\n"
  44.         "Dallas TX  75231  USA\n"
  45.         "(214)340-4991, FAX 340-8514\n"
  46.         "\nCanDo, Deckbrowser and their\n"
  47.         "support libraries are the\n"
  48.         "copyrighted sole property of\n"
  49.         "Inovatronics, Inc.  Reproduction\n"
  50.         "and distribution for any use other\n"
  51.         "than non-commercial applications\n"
  52.         "is strictly prohibited.\n\n"
  53.         @copylib-help
  54.     )
  55.     (source "libs/CanDo.Library")
  56.     (dest "Libs:")
  57.     (confirm)
  58. )
  59.  
  60. (copyfiles (prompt "Copying Doc...")
  61.         (help @copyfiles-help)
  62.         (source "ScanWWW.doc")
  63.         (dest @default-dest)
  64.         (infos)
  65. )
  66.  
  67. (copyfiles (prompt "Copying Prefs...")
  68.         (help @copyfiles-help)
  69.         (source "ScanWWWPrefs")
  70.         (dest @default-dest)
  71.         (infos)
  72. )
  73.  
  74. (copyfiles (prompt "Copying Main...")
  75.         (help @copyfiles-help)
  76.         (source "ScanWWW")
  77.         (dest @default-dest)
  78.         (infos)
  79. )
  80.  
  81. (message "\n\nSome example configfiles will be placed in ENV: and ENVARC: now.\n"
  82.             "\nPlease use ScanWWWPrefs to alter them before you start ScanWWW.\n"
  83. )
  84.  
  85. (copyfiles (prompt "Copying prefs...")
  86.         (help (cat " is being copied.\n\n" @copyfiles-help))
  87.         (source "prefs/ScanWWW.prefs")
  88.         (dest "env:")
  89.         (pattern "(ScanWWW.prefs)")
  90. )
  91.  
  92. (copyfiles (prompt "Copying prefs...")
  93.         (help (cat " is being copied.\n\n" @copyfiles-help))
  94.         (source "prefs/ScanWWW.prefs")
  95.         (dest "envarc:")
  96.         (pattern "(ScanWWW.prefs)")
  97. )
  98.  
  99.  
  100.  
  101.  
  102.  
  103. (copyfiles (prompt "Copying prefs...")
  104.         (help (cat " is being copied.\n\n" @copyfiles-help))
  105.         (source "prefs/ScanWWWget.prefs")
  106.         (dest "env:")
  107.         (pattern "(ScanWWWget.prefs)")
  108. )
  109.  
  110. (copyfiles (prompt "Copying prefs...")
  111.         (help (cat " is being copied.\n\n" @copyfiles-help))
  112.         (source "prefs/ScanWWWget.prefs")
  113.         (dest "envarc:")
  114.         (pattern "(ScanWWWget.prefs)")
  115. )
  116.  
  117.  
  118.  
  119. (copyfiles (prompt "Copying prefs...")
  120.         (help (cat " is being copied.\n\n" @copyfiles-help))
  121.         (source "prefs/ScanWWWrej.prefs")
  122.         (dest "env:")
  123.         (pattern "(ScanWWWrej.prefs)")
  124. )
  125.  
  126. (copyfiles (prompt "Copying prefs...")
  127.         (help (cat " is being copied.\n\n" @copyfiles-help))
  128.         (source "prefs/ScanWWWrej.prefs")
  129.         (dest "envarc:")
  130.         (pattern "(ScanWWWrej.prefs)")
  131. )
  132.  
  133.  
  134. (complete 95)
  135.  
  136.  
  137.  
  138.  
  139.  
  140. (complete 100)
  141.  
  142. (exit)
  143.